home *** CD-ROM | disk | FTP | other *** search
/ UpTime Volume 2 #8 / utv2n8s1.d64 / murder mansion (.txt) < prev    next >
Commodore BASIC  |  2022-08-28  |  624b  |  21 lines
  1. 100 print"[147]"chr$(9)chr$(142)chr$(8);:poke53280,0:poke53281,0
  2. 105 print"loading...":print
  3. 110 print"    [176][178][201] [201] [201] [176][192][201] [176][192][201] [176][192] [176][192][201]"
  4. 120 print"    [221][221][221] [221] [221] [221][178][203] [221] [221] [171][192] [221][178][203]"
  5. 130 print"    [203] [203] [202][192][203] [203][202]  [173][192][203] [173][192] [203][202] "
  6. 140 print
  7. 150 print"      [176][178][201] [213][192][201] [176][192][201] [213][192][201] [213][178][203] [213][192][201] [176][192][201]"
  8. 160 print"      [221][221][221] [171][192][179] [221] [221] [202][192][201]  [221]  [221] [221] [221] [221]"
  9. 170 print"      [203] [203] [203] [203] [203] [203] [202][192][203] [213][177][203] [202][192][203] [203] [203]"
  10. 180 print:print"[155]   by elite software systems"
  11. 185 print:print:print"[151] published by softdisk publishing, inc."
  12. 200 print"[144] l[207]";chr$(34);"mm";chr$(34);",8:[145][145][145]";
  13. 201 rem goto 500
  14. 320 sys65418:sys65412:poke55,0:poke56,160:clr:sys58451:poke808,234
  15. 330 ifpeek(1023)=251thensys52480
  16. 340 poke631,13:poke632,asc("r")
  17. 350 poke633,asc("[213]"):poke634,asc(":")
  18. 360 poke635,13:poke198,5
  19. 370 stop
  20. 500 getg$:ifg$=""then500
  21.